home *** CD-ROM | disk | FTP | other *** search
/ A.C.E. 1 / ACE CD 1.iso / files / docs / ufoagad.lha / UFOEnemyUnknownA1200Fix.lha / A1200Fix / ufo < prev   
Encoding:
Text File  |  1992-02-26  |  197 b   |  25 lines
  1. FAILAT 20
  2.  
  3. Geo "0" "0"
  4. IF ERROR
  5.    SKIP begin
  6. ENDIF
  7.  
  8. SKIP end
  9.  
  10. LAB begin
  11.  
  12. c/Avail >nil: flush
  13.  
  14. Tactical "1" "0"
  15.  
  16. c/Avail >nil: flush
  17.  
  18. LAB geo
  19. Geo "1" "0"
  20. IF ERROR
  21.    SKIP begin BACK
  22. ENDIF
  23.  
  24. LAB end
  25.